home *** CD-ROM | disk | FTP | other *** search
/ PC Answers 1995 December / PC Answers December 1995 (disc errors).iso / mxc / intro.dir / 00037_patrickd.ls < prev    next >
Encoding:
Text File  |  1995-05-04  |  405 b   |  18 lines
  1. on mouseDown
  2.   global myLine, csn, profileVid, gmyLineKeep
  3.   if the doubleClick or (the timer < 120) then
  4.     beep()
  5.     exit
  6.   end if
  7.   if the castNum of sprite 24 <> 107 then
  8.     beep()
  9.     exit
  10.   end if
  11.   set myLine to gmyLineKeep
  12.   set profileVid to 0
  13.   set the castNum of sprite 8 to 27
  14.   set the castNum of sprite 7 to 50
  15.   updateStage()
  16.   set the castNum of sprite (myLine + 10) to myLine + 60
  17. end
  18.